From: Jason Rumney <jasonr@gnu.org>
Date: Wed, 11 Apr 2007 23:42:03 +0000 (+0000)
Subject: (dnd-get-local-file-name): Decode both upper and lower
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~944
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=6fb8608332474e0b3e14627361d69585061d03dd;p=emacs.git

(dnd-get-local-file-name): Decode both upper and lower
case hex. Do not try to decode non-hex letters.
---

diff --git a/lisp/dnd.el b/lisp/dnd.el
index 2b523476a4f..df081539cf0 100644
--- a/lisp/dnd.el
+++ b/lisp/dnd.el
@@ -146,7 +146,7 @@ Return nil if URI is not a local file."
 		  (substring uri (match-end 0))))))
     (when (and f must-exist)
       (setq f (replace-regexp-in-string
-	       "%[A-Z0-9][A-Z0-9]"
+	       "%[A-Fa-f0-9][A-Fa-f0-9]"
 	       (lambda (arg)
 		 (format "%c" (string-to-number (substring arg 1) 16)))
 	       f nil t))